home *** CD-ROM | disk | FTP | other *** search
/ Software of the Month Cl…Business) - New Member 21 / Software of the Month Club XXI - New Member Business.ISO / mac / Business / Financial Portfolio v4.1 ƒ / Financial Portfolio v4.1 / Financial Portfolio v4.1.rsrc / LENS_139_Graph Details.bin < prev    next >
Text File  |  1995-11-23  |  2KB  |  36 lines
  1. ItemType: WIND
  2. Rect: 89,259,527,374
  3. AutoSize: FALSE
  4. Style: Windoid
  5. HasTitleBar: TRUE
  6. HasZoomBox: TRUE
  7. HasCloseBox: TRUE
  8. HasGrowBox: FALSE
  9. MinSize: 438,22
  10. MaxSize: 438,115
  11. Name: Graph Details
  12. Params: i1_Text┬i2_Text┬i0_TopLeft
  13.  
  14. ItemType: TEXT
  15. Rect: 60,5,370,23
  16. TextSize: 12
  17. AutoSize: FALSE
  18. Name: Title
  19. TextAlign: Center
  20.  
  21. ItemType: LIST
  22. Rect: 6,26,431,96
  23. TextFont: Monaco
  24. TextSize: 9
  25. AutoSize: FALSE
  26. Name: text
  27. Text: 
  28. Script: --on mouseUp  wdID,wdName,objNo,objName,objValue┬get wsGet(wdID,"text","SelectionText")┬put it into texter┬get wsGet(wdID,"text","Text")┬put it into wholeText┬if (texter<>empty) and ("Ñ" is not in texter) then -- proceed┬  if ">" is not in texter then┬    put the number of words of texter into num┬    put word 1 to (num-1) of texter into itemname┬    lock screen┬    go cd itemname┬    unlock screen with iris open fast┬    wsSet wdID,"0","TopLeft", "5,40"┬  else -- clicked on subdetail┬    put findLine(texter,wholeText) into liner┬    repeat with x=(liner-1) down to 1┬      if ">" is not in line x of wholeText then -- found main detail cd┬        put line x of wholeText into tester┬        put the number of words of tester into num┬        put word 1 to (num-1) of tester into itemname┬        lock screen┬        go cd itemname┬        unlock screen with iris open fast┬        wsSet wdID,"0","TopLeft", "5,40"┬        exit repeat┬      end if┬    end repeat┬  end if┬end if┬--end mouseUp┬
  29.  
  30. ItemType: TEXT
  31. Rect: 8,99,227,112
  32. TextFont: Geneva
  33. TextSize: 10
  34. Name: instructions
  35. TextAlign: Center
  36. Text: Click on a detail to go to its information card